10 :
20 REM*** THIS ROUTINE WILL PREVENT ***       *** THE DISK HEAD FROM        ***
30 REM*** CHATTERING AGAINST THE    ***       *** STOP IN THE DRIVE WHEN IT ***
40 REM*** IS LOADING A PROGRAM FROM ***       *** A DOS PROTECTED DISK.     ***
50 :
60 REM*** ALTHOUGH THE DOS          ***       *** PROTECTION SCHEME IS USED ***
70 REM*** FREQUENTLY ON DISKS NOW,  ***       *** CONTINUAL BANGING OF THE  ***
80 REM*** READ/WRITE HEAD AGAINST   ***       *** THE STOP IS BOUND TO      ***
90 REM*** HASTEN MISALINEMENT OF    ***       *** THE HEAD. THIS PROGRAM    ***
91 REM*** SHOULD BE RUN FIRST, AND  ***       *** THEN LOAD AND RUN THE DOS ***
92 REM*** PROTECTED DISK.           ***
93 :
94 REM*** TA-DA!! NO CHATTER!       ***
95 :
96 REM*** THANKS TO GILBERT HELLAND ***       *** FOR DISCOVERING THIS, AND ***
97 REM*** ESPECIALLY FOR SHARING IT ***       *** US.                       ***
98 REM*** BOB COKEL, 906 W 6TH AVE  ***       *** MONMOUTH, ILL, USA 61462  ***
99 :
100 POKE53280,0:POKE53281,0:PRINT"[147]":PRINTTAB(5)"1541 SAVER BY BOB COKEL"
110 PRINT"[144]O[208]15,8,15:P[210]15,"CHR$(34)"M-W"CHR$(34)";C[200](106)C[200](0)C[200](1)C[200](133):CL[207]15
120 [153]"OPEN":[151]631,13:[151]198,1:[128]
140 [143]?"O(null)15,8,15,"CHR$(34)"M-W"CHR$(34)";CLEFT$(106)CLEFT$(0)CLEFT$(1)CLEFT$(133):CL(null)15